home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 2: CDPD 1 / Almathera Ten on Ten - Disc 2: CDPD 1.iso / pd / 076-100 / 092 / bawk / example1 < prev    next >
Encoding:
Text File  |  1995-03-13  |  321 b   |  14 lines

  1. @[()\[\]{}]@
  2. {
  3.     parens = parens + match( $0, @(@ );
  4.     parens = parens - match( $0, @)@ );
  5.     bracks = bracks + match( $0, @\[@ );
  6.     bracks = bracks - match( $0, @]@ );
  7.     braces = braces + match( $0, @{@ );
  8.     braces = braces - match( $0, @}@ );
  9. }
  10. END
  11. {
  12.     printf("parens=%d, brackets=%d, braces=%d\n", parens, bracks, braces );
  13. }
  14.